home *** CD-ROM | disk | FTP | other *** search
/ Amiga Games 1996 July / Amiga Games 1996 #7.iso / archive / leserforum / tobiasfranke.lha / TobiasFranke / AUTOEXEC.AMOS / AUTOEXEC.amosSourceCode
AMOS Source Code  |  1980-02-12  |  3KB  |  72 lines
  1. Rem        *****************************************************   
  2. Rem        *             LL        AAA    PPPPP                *           
  3. Rem        *             LL       AA AA   PP  PP               *         
  4. Rem        *             LL       AAAAA   PPPPP                *           
  5. Rem        *             LL      AAAAAAA  PP                   *         
  6. Rem        *             LLLLLL  AA   AA  PP                   *               
  7. Rem        ***************************************************** 
  8. RISIKO=1
  9. REPERATUREN=1
  10. Screen Open 0,320,200,16,Lowres : Curs Off 
  11. Paper 0
  12. Cls 
  13. Pen 4
  14. Locate 2,12 : Print "Dieses Programm wurde geschrieben in"
  15. Wait 100
  16. Pen 3
  17. Locate 3,14 : Print "         AMOS -THE CREATOR          "
  18. Wait 300
  19. Cls 
  20. Load Iff "IFF/Frankenstein",1
  21. Paper 0
  22. Wait 100
  23. Locate 3,15 : Print "S H A R E W A R E - G A M E S"
  24. Wait 100
  25. Pen 4
  26. Locate 3,18 : Print "          presents:  "
  27. Wait 100
  28. Cls 
  29. Pen 3
  30. Locate 1,10 : Print "  ****          "
  31. Locate 1,11 : Print "  ****          "
  32. Locate 1,12 : Print "  ****          "
  33. Locate 1,13 : Print "  ****          "
  34. Locate 1,14 : Print "  ****          "
  35. Locate 1,15 : Print "  ****          "
  36. Locate 1,16 : Print "  ****          "
  37. Locate 1,17 : Print "  **********    "
  38. Locate 1,18 : Print "  **********    "
  39. Locate 1,19 : Print "  **********    "
  40. Boom 
  41. Boom 
  42. Boom 
  43. Wait 50
  44. Locate 1,10 : Print "  ****         ******       "
  45. Locate 1,11 : Print "  ****         ******             "
  46. Locate 1,12 : Print "  ****        ***  ***          "
  47. Locate 1,13 : Print "  ****        ***  ***      "
  48. Locate 1,14 : Print "  ****        ***  ***         "
  49. Locate 1,15 : Print "  ****        ********             "
  50. Locate 1,16 : Print "  ****        ********                       "
  51. Locate 1,17 : Print "  **********  ***  ***                           "
  52. Locate 1,18 : Print "  **********  ***  ***                    "
  53. Locate 1,19 : Print "  **********  ***  ***               "
  54. Boom 
  55. Boom 
  56. Boom 
  57. Wait 50
  58. Locate 1,10 : Print "  ****         ******   ********** "
  59. Locate 1,11 : Print "  ****         ******   ********** "
  60. Locate 1,12 : Print "  ****        ***  ***  ***     ***"
  61. Locate 1,13 : Print "  ****        ***  ***  ***     ***"
  62. Locate 1,14 : Print "  ****        ***  ***  ********** "
  63. Locate 1,15 : Print "  ****        ********  ********** "
  64. Locate 1,16 : Print "  ****        ********  ***       "
  65. Locate 1,17 : Print "  **********  ***  ***  ***       "
  66. Locate 1,18 : Print "  **********  ***  ***  ***       "
  67. Locate 1,19 : Print "  **********  ***  ***  ***       "
  68. Boom 
  69. Boom 
  70. Boom 
  71. Boom 
  72. Run "LAP.AMOS"